[Control] AuthorName=Prolink CompanyName=Prolink DateCreated=3/26/97 Description=Wilson 600 Emulation BaudRate=9600 Parity=NONE BitsPerByte=8 StopBits=1 FlowControl=NONE NoOfChannels=1 Port=COM1 Phone= E-Mail= GetString= DelayTime= InitString= Parse=14 ParseLines 1=*{SetVar,ErrText,} {SetVar,ErrNum,} {SetVar,Action,} {SetVar,User9* ParseLines 2=*,} {SetVar,MoveWarn,}~{SetVar,User8,0} {MoveFirst} {StartRead} {M* ParseLines 3=*oveAbs,5} {StopRead} {ReadVar,User9}~{If,{Var,MoveWarn},,~ {If,{* ParseLines 4=*Compare,=,{Var,User9},GOOD },{SetVar,User8,1},}~ {If,{Compare,=,* ParseLines 5=*{Var,User9}, },{SetVar,User8,1},} ~ {If,{Compare,=,{Var,User* ParseLines 6=*9},HIGH },{SetVar,User8,1},}~ {If,{Compare,=,{Var,User9},LOW },* ParseLines 7=*{SetVar,User8,1},}~ {MoveAbs,13} {StartRead} {MoveLast} {StopRea* ParseLines 8=*d} {ReadVar,User9}~ {If,{Var,MoveWarn},{SetVar,User8,0},}~}~{If,* ParseLines 9=*{Var,User8},~ {MoveAbs,6} {StartRead} {MoveTo,0,1, } {MoveRel,-1* ParseLines 10=*} {StopRead} {ReadVar,Actual}~ {If, {Compare,#=,{Var,Actual},0},* ParseLines 11=*~ {SetVar,ErrNum,2} {SetVar,ErrText,The hardness could not be * ParseLines 12=*measured or converted} ~ ,}~ {If, {Compare,=,{UCase$,{Var,Units* ParseLines 13=*}},{Var,User9}},,~ {SetVar,ErrNum,5} {SetVar,ErrText,The hardn* ParseLines 14=*ess was measured in {Var,User9}} ~ }~,~ {SetVar,Action,1}~}* Notes=2 NoteLines 1=*Designed on a Wilson 2000 in 600 Emulation mode. The output of a * NoteLines 2=*real 600 is slightly different - see the Wilson 600 script.*